object Fp: TFp Left = 218 Top = 129 Width = 526 Height = 346 BorderIcons = [biSystemMenu, biMaximize] Caption = 'Mobil 1.0 - P�evod melodi�' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = False OnClose = FormClose OnCreate = FormCreate OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object M1: TMemo Left = 0 Top = 90 Width = 257 Height = 191 Align = alLeft Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnEnter = M1Enter end object M2: TMemo Left = 261 Top = 90 Width = 257 Height = 191 Align = alClient Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 1 OnEnter = M2Enter end object SB: TStatusBar Left = 0 Top = 281 Width = 518 Height = 19 Panels = < item Width = 150 end item Width = 200 end item Width = 200 end> SimplePanel = False end object ToolBar1: TToolBar Left = 0 Top = 0 Width = 518 Height = 30 ButtonHeight = 28 ButtonWidth = 29 Caption = 'ToolBar1' Flat = True Images = F0.IL Indent = 5 TabOrder = 3 object Bopen: TToolButton Left = 5 Top = 0 Hint = 'Otev��t soubor s melodi� (Ctrl+O)' Caption = '&Otev��t ...' ImageIndex = 0 MenuItem = Otevrit ParentShowHint = False ShowHint = True end object ToolButton1: TToolButton Left = 34 Top = 0 Width = 8 Caption = 'ToolButton1' ImageIndex = 9 Style = tbsSeparator end object Bsave: TToolButton Left = 42 Top = 0 Hint = 'Ulo�it melodii (Ctrl+S)' Caption = '&Ulo�it' ImageIndex = 1 MenuItem = Ulozit ParentShowHint = False ShowHint = True end object Bprint: TToolButton Left = 71 Top = 0 Hint = 'Vytisknout melodii (Ctrl+P)' Caption = '&Tisk ...' ImageIndex = 2 MenuItem = Tisk ParentShowHint = False ShowHint = True end object ToolButton2: TToolButton Left = 100 Top = 0 Width = 8 Caption = 'ToolButton2' ImageIndex = 9 Style = tbsSeparator end object Bhelp: TToolButton Left = 108 Top = 0 Hint = 'N�pov�da pro P�evod melodi� (F1)' Caption = 'N�pov�da pro P�evod melodi� ...' ImageIndex = 9 MenuItem = NapovedaProPrevodMelodii ParentShowHint = False ShowHint = True end end object Panel1: TPanel Left = 0 Top = 30 Width = 518 Height = 60 Align = alTop BevelOuter = bvNone TabOrder = 4 object P1: TPanel Left = 5 Top = 5 Width = 250 Height = 50 TabOrder = 0 object SBPlay1: TSpeedButton Left = 190 Top = 8 Width = 50 Height = 35 Caption = '&P�ehr�t' Enabled = False Flat = True OnClick = SBPlay1Click end object GB11: TGroupBox Left = 5 Top = 3 Width = 90 Height = 40 Caption = 'K�dovan�' TabOrder = 0 object CBKodovani1: TComboBox Left = 5 Top = 14 Width = 80 Height = 21 Enabled = False ItemHeight = 13 Items.Strings = ( 'Alcatel' 'Ericsson' 'Nokia' 'Siemens' '') TabOrder = 0 end end object GB12: TGroupBox Left = 93 Top = 3 Width = 90 Height = 40 Caption = 'Tempo' TabOrder = 1 object CBTempo1: TComboBox Left = 5 Top = 14 Width = 80 Height = 21 Enabled = False ItemHeight = 13 TabOrder = 0 OnChange = CBTempo1Change end end end object P2: TPanel Left = 263 Top = 5 Width = 250 Height = 50 Caption = 'P2' TabOrder = 1 object SBPlay2: TSpeedButton Left = 190 Top = 8 Width = 50 Height = 35 Caption = '&P�ehr�t' Enabled = False Flat = True OnClick = SBPlay2Click end object GB21: TGroupBox Left = 5 Top = 3 Width = 90 Height = 40 Caption = 'K�dovan�' TabOrder = 0 object CBKodovani2: TComboBox Left = 5 Top = 14 Width = 80 Height = 21 Enabled = False ItemHeight = 13 Items.Strings = ( 'Alcatel' 'Ericsson' 'Nokia' 'Siemens' '') TabOrder = 0 OnChange = CBKodovani2Change end end object GB22: TGroupBox Left = 93 Top = 3 Width = 90 Height = 40 Caption = 'Tempo' TabOrder = 1 object CBTempo2: TComboBox Left = 5 Top = 14 Width = 80 Height = 21 Enabled = False ItemHeight = 13 TabOrder = 0 OnChange = CBTempo2Change end end end end object Rozdel: TPanel Left = 257 Top = 90 Width = 4 Height = 191 Align = alLeft BevelOuter = bvNone TabOrder = 5 end object MainMenu1: TMainMenu Images = F0.IL OwnerDraw = True Left = 463 Top = 256 object MSoubor: TMenuItem Caption = '&Soubor' object Otevrit: TMenuItem Caption = '&Otev��t ...' Hint = 'Otev��t soubor s melodi� (Ctrl+O)' ImageIndex = 0 ShortCut = 16463 OnClick = OtevritClick end object N3: TMenuItem Caption = '-' end object Ulozit: TMenuItem Caption = '&Ulo�it' Hint = 'Ulo�it melodii (Ctrl+S)' ImageIndex = 1 ShortCut = 16467 OnClick = UlozitClick end object UlozitJako: TMenuItem Caption = 'Ulo�it jako ...' Hint = 'Ulo�it melodii jako' OnClick = ulozitjakoClick end object N4: TMenuItem Caption = '-' end object Zavrit: TMenuItem Caption = '&Zav��t' Hint = 'Zav��t soubor s melodi�' ImageIndex = 6 OnClick = ZavritClick end object N1: TMenuItem Caption = '-' end object Tisk: TMenuItem Caption = '&Tisk ...' Hint = 'Vytisknout melodii (Ctrl+P)' ImageIndex = 2 ShortCut = 16464 OnClick = TiskClick end object Nastaventisku1: TMenuItem Caption = 'Nastaven� tisku ...' Hint = 'Nastaven� tisku' ImageIndex = 3 end object Konec: TMenuItem Caption = '&Konec' Hint = 'Konec pr�ce (F10)' ImageIndex = 5 ShortCut = 121 OnClick = KonecClick end end object MNastaveni: TMenuItem Caption = '&Konfigurace' object LamaniRadek: TMenuItem Caption = 'L�&m�n� ��dek' GroupIndex = 1 Hint = 'L�m�n� ��dek' ImageIndex = 8 OnClick = lamaniradekClick end object N5: TMenuItem Caption = '-' GroupIndex = 1 end object Editoru1: TMenuItem Caption = '&Nastaven� ...' GroupIndex = 1 Hint = 'Nestaven� (F5)' ImageIndex = 11 ShortCut = 116 OnClick = Editoru1Click end end object MNapoveda: TMenuItem Caption = '&N�pov�da' object NapovedaProPrevodMelodii: TMenuItem Caption = 'N�pov�da pro P�evod melodi� ...' Hint = 'N�pov�da pro P�evod melodi� (F1)' ImageIndex = 9 ShortCut = 112 OnClick = NapovedaProPrevodMelodiiClick end object N2: TMenuItem Caption = '-' end object OAplikaci: TMenuItem Caption = 'O aplikaci Mobil 1.0' Hint = 'O aplikaci' ImageIndex = 10 OnClick = OAplikaciClick end end end end